inherited fCompra: TfCompra
  Left = 193
  Top = 108
  Width = 800
  Height = 558
  Caption = 'Compra'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label14: TLabel [0]
    Left = 636
    Top = 233
    Width = 34
    Height = 16
    Caption = 'Obs..:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  inherited MMJPanel1: TMMJPanel
    Top = 0
    Width = 792
    Height = 60
    Align = alTop
    inherited btnCancelar: TBitBtn [0]
      Left = 83
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A2
        3F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804BC5804A23F08A2
        3F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A74407C96501CC6701BC5804A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B24E05CC6701CC6701BC
        5804A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B45105CC6701CC
        6701B45105A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804CC
        6701CC6701AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08C4
        6002CC6701C96501A74407A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A5
        4208C76202CC6701C25D03A23F08A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        C5681AC16214BD5D0FBA5709B75305B75305B75305B75305B75305B75305B753
        05B75305B75305B75305AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A2
        3F08AA4707C96501CC6701B75305A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        EE9B37E7902BDF841FD87914D06E08CC6701CC6701CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701CC6701A54208A23F08C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08AF4C06CC6701C96501A74407A23F08A23F08C0C0C0A23F08A23F08
        F7A944F09D39E8922DE18621D97B15D26F0ACD6802CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701C25D03A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08BA5604CC6701BC5804A23F08A23F08C0C0C0A23F08A23F08
        FCB04CF8AA46F19F3BE9942FE28823D77917A94609A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08A74407CC6701CC6701A74407A23F08A23F08A23F08A23F08
        FCB04CFCB04CE9983CD37A27EB9531E38A25CB6C16A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08BF5B03CC6701BA5604A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA7450CE38F33EC9733E48C27B95A11A23F08A23F08C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B45105CC6701C25D03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08B25313EF9E3CED9935E28928AE4D0DA23F08A23F
        08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701C96501A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C36820F6A742EE9B37E38B29AE4D0EA23F
        08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08CF7729F7A844F09D39E48D2BAF4E
        0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08DA8532F8AA46F19F3BE58F
        2DAF4E0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B75305CC6701C76202A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08A23F08DA8632F9AC48F2A1
        3DE6912FB75813A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08C76202CC6701BF5B03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0A23F08A23F08A23F08DA8633FAAD
        49F3A33EEC9733C06317A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08A23F08B45105CC6701CC6701B24E05A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0A23F08A23F08A23F08C469
        22FBAE4AF5A540ED9935CD721EA6440AA23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08AA4707CC6701CC6701C76202A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F
        08B95B19F6A846F6A742EE9B36DB8225B65611A23F08A23F08A23F08A23F08A2
        3F08B45105CC6701CC6701C96501AA4707A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F
        08A23F08A8460CDA8532F7A844F09D38E8912DDD8220CC6D13C6640AC25E03C4
        6002CC6701CC6701C76202AA4707A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0A23F08A23F08A23F08B85B19DC8731F19F3AE9932FE28823DA7C17D2710BCD
        6802C76202B75305A54208A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        D57F2EF6A948C46922A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0A23F08A23F08A23F08A23F08A7450BBF621AC5681BC16315B7560DAB
        4808A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08
        A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnExcluir: TBitBtn [1]
      Left = 83
      Top = 2
      Width = 77
      Height = 55
      Layout = blGlyphTop
    end
    inherited btnGravar: TBitBtn [2]
      Left = 4
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C00066000066000066000066000066000066005B8D5AB5B3B3B5B3B3B5B3
        B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B32D792D00660000
        6600006600006600006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008300008C00008C00008C00008C00007000367C36FAF6F3FDF9F6FDF9
        F6FDF9F6FDF9F6FDF9F6F9F6F3F0EEECE7E5E4DEDDDDDEDDDD327E3200660000
        6600006600007500008A00008300006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300297528FAF6F30066000066
        00006600006600FAF6F3FDF9F6F9F6F3F0EEECE7E5E4DEDDDD37833600660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002A7629F6F0ED0066000066
        00006600006600F3F0EDFBF7F4FDF9F7F8F4F2EFECEAE6E4E338843800660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002B772AEFE8E40066000066
        00006600006600E9E6E4F5F2EFFCF8F5FDF9F6F6F3F0EDEBE93A863900660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002D782BE8DEDB0066000066
        00006600006600DBD8D7ECE9E6F7F3F0FCF9F6FCF9F6F5F1EF3C883B00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300307A2DE0D4D10066000066
        00006600006600C9C7C5DEDCDAEEEBE8F8F4F1FDF9F6FBF8F53E893C00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300327C2FDACCC90066000066
        00006600006600B2B1B0CDCBCAE2DFDDF0EDEAF9F5F3FDF9F63F8B3E00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300357E30D6C6C30066000066
        00006600006600A2A1A1B7B6B5D1CFCDE5E2E0F2EFECFAF7F43F8B3E00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300377F32D6C6C3C9BDBABDB4
        B2B2ADACA9A6A6A3A2A1A3A3A3BCBBBAD5D3D1E8E4E2F4F0EE3E8A3D00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000099000099000099000099000099
        0000990000990000990000990000990000990000990000990000990000990000
        9900009900009900009800008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000099000099000099000099000099
        0000990000990000990000990000990000990000990000990000990000990000
        9900009900009900009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009300008C00018E01049408079B0F0AA0140CA4180DA61A0DA6
        1A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0D
        A61A0DA61A0AA213009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00008000006600036B051187211EA13C29B65130C56133CB6733CB
        6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733
        CB6733CB6726BF4D009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        0066000083000079003B863AFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BB4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0006600006600317D31C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2
        C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3
        C2C2D6BCBB26B24D006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnIncluir: TBitBtn [3]
      Left = 4
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00090909001212
        12001F1F1F002C2C2C003939390045454500525252005F5F5F006C6C6C007878
        780085858500929292009F9F9F00ABABAB00B8B8B800C5C5C500D2D2D200DEDE
        DE00EBEBEB00F8F8F800F0FBFF00A4A0A000C0DCC000F0CAA60000003E000000
        5D0000007C0000009B000000BA000000D9000000F0002424FF004848FF006C6C
        FF009090FF00B4B4FF0000143E00001E5D0000287C0000329B00003CBA000046
        D9000055F000246DFF004885FF006C9DFF0090B5FF00B4CDFF00002A3E00003F
        5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
        FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
        D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
        3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
        CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
        460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
        0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
        6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
        000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
        0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
        6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
        0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
        00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
        6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
        0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
        00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
        6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
        4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
        3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
        CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
        D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
        5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
        FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
        D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF00070707070707
        0707070707070707070707070707070707070707070707070707070707070707
        0000000000000000000000000000000000000000000000000707070707070707
        004F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F0007070707070707
        00564A564A5656564A5656564A564A4A564A4A4A4A4A4A4F0007070707070707
        005656564A564A4A56564A56564A56564A4A4A4A4A4A4A4F0007070707070700
        565656564A564A4A4A564A56564A564A4A4A4A4A565649000007070707070700
        564A56565656564A564A564A564A4A56564A4A564A4A4F000007070707070700
        56565656564A5656565656565656564A4A56564A564A03000007070707070056
        565656565656564A564A56564A565656564A4A564A49004F0007070707070056
        564A56565656565656564A565656564A56564A5656490049000707070707004A
        564A4A4A564A56564A4A564A4A4A564A56564A564A4F00490007001616160056
        56564A564A564A564A5656564A564A564A564A4A560300490007002020200056
        4A5656565656565656564A5656565656565656564A0049490007000F0F004A56
        56564A564A56564A565656564A564A56564A5656560049490007000F00005656
        56565656564A5656565656565656564A565656564A0049490007000F0F004A56
        4A565656565656564A564A565656565656564A56560049490007000F0F000000
        0000000000000000000000000000000000000000004A4A490007000F00000000
        0000000000000000000000000F200056564A564A56564A490007000F0F0F0F0F
        0F0F0F0F0F0F0F0F0F0F0F0F0F20004A565656564A4A56560007000F0F0F0F0F
        0F0F0F0F0F0F0F0F0F0F0F0F0F20005656495656565656560007000F00000000
        0000000000000000000000000F20000000564956564956560007000F0F0F0F0F
        0F0F0F0F0F0F0F0F0F0F0F0F0F20000700565656565656560007000F0F0F0F0F
        0F0F0F0F0F0F0F0F0F0F0F0F0F20000700000000000000000707000F00000000
        0000000000000000000000000F20000707070707070707070707000F0F0F0F0F
        0F0F0F0F0F0F0F0F0F0F0F0F0F20000707070707070707070707000F0F0F0F0F
        0F0F0F0F0F0F0F0F242322070F1C000707070707070707070707000F00000000
        00000000000000002322201C1C19000707070707070707070707000F0F0F0F0F
        0F0F0F0F0F0F0F0F241613131313130707070707070707070707000F0F0F0F0F
        0F0F0F0F0F0F0F0F2400221C1607070707070707070707070707000F00000000
        0000000000000000240020160707070707070707070707070707000F24242424
        24242424242424240F001C070707070707070707070707070707000000000000
        0000000000000000000007070707070707070707070707070707}
      Layout = blGlyphTop
    end
    inherited btnProcurar: TBitBtn
      Left = 330
      Top = 2
      Width = 77
      Height = 55
      OnClick = btnProcurarClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C08D958B
        828478909488C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C07892A3576A77
        979EA19699978B958FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C05595D66C9BD1
        5162839396A48C92918B928BC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C06BAFFC84C0FF
        6E97CE4E6A8D94A4B18890908F9493C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A9D2FF7EB4F0
        6CBAFF4B93D340618896A2B4868D9095958FC0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        6DC0FE66BDFF6197CE405F8690A0B18E9392959283C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        9CCDED7FC4F570BAFA5D9AD844628B8C98AA919B95727B677175628585777A74
        6D827D7A737877737B7A727A79777A71817D64897E5E927D61937C62917B628D
        7862927E65927D629A8266927D5D91835F888062807D6FA8A8A2C0C0C0C0C0C0
        C0C0C0C0C0C07DC2FB73B5F66F97D24E658B8C9DA05B6656434532767162847B
        71716B664D4F4F4C54545A626157584E574F325A472162451E67492063482362
        4823624B255D441C6A4D216046185F491F554625524E3C97958DC0C0C0C0C0C0
        C0C0C0C0C0C06A8DAF8FBBF083B4FA7299D063768381847B877F788F857B9895
        8697978B959294ABABB18F92967877738B7C6C887052866A3B826630826A3484
        6F3B7F6D387E6A33866E34876F3B81694595836C2D23198A8582C0C0C0C0C0C0
        C0C0C0C0C0C08993A4A7BDE182AAE595BDEE8995A19A948D9E8D84D9CBBFE2E0
        CEFAFDEEF8F3F4F7F3F9E7EBECDFDDDCA0948A937E69E6CFA9FFFFDCFFFFD4FF
        FFD3FFFFD9FFFFD5FFFFD8FFFFD8FFFADFF2E2D2463B338B8580C0C0C0C0C0C0
        C0C0C0C0C0C0918E90E8E6F2CEE1FCC8DAF1ACAAAAA39484EBD4BEFEECD5FDFA
        E5FFFFF4FBF8F3FFFEFDF4FBF4F8FDF4F1EDE8B3AAA1857A6CCFC3B1FAF3E0F6
        F0DDF6F5E0E9E8D3F2F1DCF2EEDBFFFFF5E5DFD4433D32928C81C0C0C0C0C0C0
        C0C0C0C0C0C0AD9D91FFF0E9F2F5FDF8FCFFA69689CCB399FCE1BFF7E3C0F3ED
        D0FAFBE7FAFBF1DADED9DEE2DCEEF2ECE4E5E1FEFBF7A09B9A7772718B888481
        827E808780828984FAFFFCFBFFFCF8F8F2E1DED6443C35887F76C0C0C0C0C0C0
        C0C0C0C0C0C0B79E84FFECD7FEF9FAE2DEDDDFC5A7FFE9BDFFEFC2FFE9BCFFFB
        D3FFFFE1FBFFF5EFF6F3F6F7FBFCFBFFFFFFFCF4F1ECE1DCDD716C6EBCBCBCF8
        FDFCF7FFFEF1FCFAEEF8F8F5FBFAFFFFFBE2DED945373B918188C0C0C0C0C0C0
        C0C0C0C0C0C0BB997BFFF2D6FFFDF7BFB5AEFEE0C3F2CBA4DABA91CEB589FFF3
        C3FFFFDFF5FAEBF5FDFDC4C7CFC6C9CEC2C2BCFAF7F2FEF9FB86808B6C6A7E00
        0015000016000010F3FDFFF2FAFAF5F9F3DEDED83F383D8E828EC0C0C0C0C0C0
        C0C0C0C0C0C0C9A58DFFE8CFF3DDD2DAC8C1D2B7A9E6C5B5DDBCA9EDD1B3FFF7
        C1FFFFD8F6F6EACAD0D5C5D4D7C2D0CEC2CAC0FEFCF4FEF7FCA49AB16A629712
        0E4F0D0F50202556E5EDFFF3FCFFF9FFF9DEE6DC363A3B7B7F84C0C0C0C0C0C0
        C0C0C0C0C0C0BD9882FFEED7F4D7CED2BFB8FFFAF2D4BEB2F4D2C5DFC1A6FFF4
        BCFEF9C2FFFFEEF8F9EFC9D8CAE4F7E4D1DAC0FFFFECFDF5F5B0A7C26E67A434
        3181E4E6FF060C4FEEF6FFF5FEFFF6FFF5D3DACD363A35878A88C0C0C0C0C0C0
        C0C0C0C0C0C0BF9D86FFE8D2FDE0DCD3C2BFFFFCEAEAE0C8E0C1AAE0C09DFFEC
        B5FFF7BCFFF4C4FFFFDCFFFFDAD7E3B3D8E3ABEDF2C5FFFEF39F99AC7678A832
        387B293282081258E7F1FFF1FBFFF6FFF2E1E2CE433A2D99887FC0C0C0C0C0C0
        C0C0C0C0C0C0BE9B87FFF7E5FFECEBCABCBDF1F4E4FEFEE6F1DAC4FFE4C7F3DC
        AFFEECB7FFFBC6FFEEBBFFF8C3F5F4BCF9FFBDF5F9C5E5E1CF837E87C7C9E7E7
        EDFFE3ECFFE6EFFFEBF5FFF0FAFFFAFFF2DFDDC54B3A259C836FC0C0C0C0C0C0
        C0C0C0C0C0C0C39A8BFFF1E2FFF5F1E6DCDCB1B8B1D7DDD2F1E3DDF6E0D4F8E4
        CBF5E2C1F6DFBFE8D0ACE6CCA4E3CFA0F4EFB8F7F5C5D0C9B59A939087828B7E
        7E907C7C9A6F7390EFF5FFEFF5FAFCFFF6E7E6CC412F10AC926EC0C0C0C0C0C0
        C0C0C0C0C0C0C19B89FFE5D6FFF8F5FEFCFF99A2ABE5ECF5FFFAFCFFFEFAFFF8
        EAE6D8C1F6E7C6F5E1B8FFE6BDFFE4B8FFF3C8EBE2C0918D7BC7C1BAFFFBF7FF
        FEFCFFF8FCFFF9FFFAFCFFF5FCFFF9FDF1E8E3CA463310AB926AC0C0C0C0C0C0
        C0C0C0C0C0C0BA9B84FFF0D8FFFCFDEEF5FFD9E2FF747C9A9DA3A8C7C8BFFFF9
        F0FFFFEDE7EAB2EFEDA7DFCC8FF4D8A9B49C80B2A597AFB0AEF8F6F5FFFBF424
        01002200001F0903EEF1F5F6FFFFFFFFF3EEE2CA49371A9D8868C0C0C0C0C0C0
        C0C0C0C0C0C0BD9E85FFF4DAFCFDFBE3F0FF0D15510B1454808AB2949BAEEBEE
        F2FCFEEBEEF7C5EAEFAAEFE79ACDBF7D90805BCBC4B5EDF8F6FFFEFF33080547
        08004E1000370B00FFFFFEECF4F3FFFCEFEADDC746381C9D8F72C0C0C0C0C0C0
        C0C0C0C0C0C0C89E87FFECD6FDFBF3EBF7FFDBE2FF2A2E9EC1CAFF0C1965818D
        A589938DA2A69AB4B88EB0B95ED3DE787A823CFDFFDFF0FFF7FAF4F9FFECFBA7
        444EFFA79F4D0500FFF4F3FDFFFFFFFAF1EAE0CE3B351892906EC0C0C0C0C0C0
        C0C0C0C0C0C0CE9D83FFEFD4FFFDEFF8F8FFEDE5FF3C328F342D8E141159F4F3
        FFFFFCF7FFFAF6FFFFE58385337D8423777933FFFFD9FAFFECFFFEFBFFEDF7A7
        474DA9483A5C0E00FFF8F3FFF7F2FFFAEBECDEC8403B228B8A6EC0C0C0C0C0C0
        C0C0C0C0C0C0D2A07CFFF0CDFFFDE9FFF8F1FFE6EAFFE3EFFFE2F3FFE3EFFFE9
        E0FFECD9FFECD9FFF0D2FFF7C5FFFAC4FFF4CEFFEED2FFEDD6FFEEDAFFEBD9FF
        E8D2FFEECEFFEFD1FFF5E2FFFAE5FFFFE4FFE2C3564635968E81C0C0C0C0C0C0
        C0C0C0C0C0C0C38B5AE7A46BD39870D6A17CDB9F75DB9F75DB9D77DB9D77E09F
        73E29F72E29E73DE9F73D5A172D39F70D99E71DE9E75DFA178DBA177D19970C8
        9166C38857E7A777CB825CCB865FD8A071AC845A4B331D948277C0C0C0C0C0C0
        C0C0C0C0C0C0A468229D4E00873A008C3E008E3C008E3C008E3C008E3D00903F
        00913F00933B00913B008A3F008740008C4200914200923E00913A0091360093
        3801973D009D42009C42028C390094531695632E5B3816B69A82C0C0C0C0C0C0
        C0C0C0C0C0C0AE772EB46B0FCB7F2DCC7E31CE7C2ECE7D2CCC7E2BCA8028C883
        22C88322CA7F29C87E2CC7812DC88227CD851FD08420CF7C27CF782ED97C3DE3
        8647EE9249CF792DFFAE63D38B43C88D48B88A54664623F9E0C6C0C0C0C0C0C0
        C0C0C0C0C0C0C6A167BC8940C18B4CAE773AB27D3AB27E37B48034B18230A886
        2DA1862FA18433A28334AA8436AD7F31B57E2DBA8132B67F3CB57C3EB77A3ABA
        7D3BB47934B9833CB0853CA781399C7939AE9361E0CFB5C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnSair: TBitBtn
      Left = 565
      Top = 2
      Width = 83
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C08AB4CE005696005D9F005F99005C94005B93005A90005A91005A9000
        598E195B811F5D8230627C4D6D7E5C7582C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B4CDDE186A9D146B9F176FA2176F
        A21970A30C679A02639C1B76C91976C61674C11575BE1272BA106FB60B6BAE0B
        6AAE0364A90064A500619E005A9F005C9C20597BDDD7D4C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C072A5C7004A8206437007406D0640
        6D073F6D014D800766A5217FD22083D22487D32183D22183D22183D22081D01F
        7ECF1D7DCC1B78C91A78C71871C00668AD125A85D6D0CBC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0EEE7EF5F9BBD00508513375F14355D1436
        5F14325A044F660866AC268AD7288CD5278ED6278DD6268DD6268BD5268AD426
        8AD42286D22287D32387D3207FD01072BC125985D3CDC7C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0D4D5D4408440629ABE005288123964133561112A
        5F013E220D785A0B65B7288ED92D93D9268BD5298FD72B91D82B91D8258CD626
        8CD5268DD6268CD5268BD52188D41475C6125886C9C3BEC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0A8B7A71E8F2305880A4A84B60044800B2E4C06393C0465
        1550BC533C95A10762B02F93DC2D94D9278CD52B92D92D94DA2D94DA258DD627
        8DD62A91D8288ED7268DD5288ED7187EC6115883C0BCB8C0C0C0C0C0C0C0C0C0
        C0C0C064956303940E27C23A32C0442EB63C35B84251C55E69D27A76D88D85DF
        9D79DA8C0062641371BB3396DF349ADD238BD33198DC3298DC3399DD298FD72B
        91D82F96DA2C93D9288FD72C92D91F82C900588DB0AFAEC0C0C0C0C0C0EAEFE9
        35863700A1061EBB2F25BB362FBC403AC54E58CC6C60D07664D07975D68C7BDC
        90177F180044611579C93599DF399EDF268DD9389EE2359CDF379DDF2B90D82B
        91D83198DC3096DB2990D72F94DB2587D500588EA8A8A7C0C0C0C0C0C0C7DCC6
        0085010EB72016B92826BB3730BC4039C34C4EC96260CF7570D78579DE8E24A2
        1E063934034F8B1A7BBF389FE53CA4E51F78B02C83B7369BDC3DA5E82D93DA2D
        94D9379ADD3299DD2A91D83397DD278BD4005B91A0A3A2C0C0C0C0C0C0C0C0C0
        DAE8D92B9A2F12AD2128BF3A2FBC403BC54E51CD6357CD6541B34A0B6E1A072F
        481334620153861B80CA3996D21B5E9A0A4D920D4883164C6E3594D12E97DE2F
        95DB389FE1349BDE2A91D7399EE02A8DD9005C93979C9EC0C0C0C0C0C0C0C0C0
        C0C0C0EAECE94D9F4E04A31134C5472BB137188D2516633B09483C0B37501435
        6413385F005288278BCE1A6FB6105EAA1A7DCB1472C30A417D2D72932F97DE31
        98DC3BA1E3389EE12A91D8389EE22E93DA02619D8A9399C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C071B57315A0211B911C096095083D731332601337621337
        5F13375F02578F288CD20F5EA81879C82086D31D81D00F5EAC175E8E3196D934
        9ADE3EA4E53BA1E22991D83BA2E33398E10665A4869093C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0AFD1AE1B931A06639F0C406B13365E1338601337
        5F12385F005D942C91D7145EA657A3D860ACDF5DAADC155FA72172A0359ADE34
        9BDE40A6E53EA4E42991D83FA5E5369CE40666A5768992C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E1F5DC005B9210386013375F1338601337
        5F12375E005D943199DB2175B19CB0D3EEF5FDC2D2E7195D9E3C9DD3339BE037
        9DE041A7E541A7E72990D840A6E53A9FE50668A671858CC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000578F11386013375F1338601337
        5E0D3D670360963297D93FA8E92A84BD559ACA2F85BF41A2DD4CB4F1359CDE38
        A0E245ABEA48AEEA2A90D743A9E73EA6E80F72B4607F8DC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000568E13355E1338611338601336
        5E0E3C6604639E3399DA4DB1F03FA9E92994DC4DB5F24CB3F04CB2EE359CE038
        9FE148AEEA49AEEB2B91D946AAEA3FA7E71374B7597A8BC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004F861233520F2E501338601336
        5D0B426C0565A13B9FE14DB3EF3EA6E739A1E44DB7F248B0EF4AB3F1319BE034
        9FE445AFEF46B1F0258FD93DA8EA47AFEE1375B748718BC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004984025A16003B170D254B1436
        5C0B426E0A6BA93EA2E54AB5F438A1E43AA4E853B5EE4EB4EE53B6EF419EDD53
        A8DD60B7E863B9E84B9CD462B4E64AAEEF1478BE466F87C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00035740E771623A3260033180A18
        3A09406B0B6EABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF127DC63A6B86C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08BA08D0062072E9B3280E39940B2480042
        0D0A32530B74BA0000FF0000FF0000FFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1A81CB306380C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0819E802B862C219E2C4AC55A62CD736ED4847DDB9356C6
        5C0868470B6DBBFFFFFFFFFFFF0000FFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1981CB2C6382C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C057965705A4122CC03E44C85856CB6B60D0766CD18076D68C90E8
        9F3793930B6CB50000FF0000FF0000FFFFFFFF0000FF0000FF0000FF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1B87D2245F81C0C0C0C0C0C0C0C0C0
        C0C0C000920321BD322ABF3C31C3443DC54F54CD6565D2786BD28083DE9B77DC
        7E127572147BC60000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FF0000FF0000FF2694DC1B587CC0C0C0C0C0C0C0C0C0
        4FA0520BB51D1EBE3012AD2118992144A84F095B3024912D79DD9056BF620B66
        10004D6D1C83CB0000FF0000FF0000FFFFFFFFFFFFFF0000FF0000FFFFFFFFFF
        FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF2C98DE195B7EC0C0C0C0C0C0C0C0C0
        0B90100CB61D00900678A178C2D4BEC0C0C008367019842B4BC34D0157110F2C
        53024F851B87CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFF349BE015597FC0C0C0C0C0C0C3DEC3
        0190062A8F2DD2D1CFC0C0C0C0C0C0C0C0C00F39660464180149201330651532
        5B025182228BCF5EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55E
        B9F55EB9F55EB9F55EB9F55EB9F55EB9F5339BE00C547EC0C0C0C0C0C0C3E1C3
        007000B4BBB5C0C0C0C0C0C0C0C0C0C0C0C000487C00467400437900477A0045
        76005588268CCE49B5FB5EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55E
        B9F53EAAF033A1E92C9AE23093D42B8FCF0F76BD105780C0C0C0C0C0C0C5E2C5
        4F9250C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04389B2488BB6478CB5478CB54F91
        B80461962485C644AAEE3BA8EF39A2E92E9BE02892D9238ACF1780C90A74BE04
        6CAD005C96005991005A97025893096195186B9D75A0B8C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C02E77A600589500609E00548F00518800548B0F6192256C972C78A13F7DA14B
        89AA7AA6C3A5C6DABDCAD2C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    object Panel1: TPanel
      Left = 161
      Top = 2
      Width = 4
      Height = 56
      BevelInner = bvRaised
      Color = clTeal
      PopupMenu = PopupMenu1
      TabOrder = 6
    end
    object BitBtn1: TBitBtn
      Left = 166
      Top = 2
      Width = 77
      Height = 55
      Caption = 'F6-Finalizar'
      Enabled = False
      PopupMenu = PopupMenu1
      TabOrder = 7
      OnClick = BitBtn1Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EB1908EB1908EB1908EB1908EB1908EB1908EB190
        8EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1
        908EB1908EB1908EB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE
        FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE
        FEFEFEFEFEFEFEFEB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE
        FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE
        FEFEFEFEFEFEFEFEB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFC
        FBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFEFCFBFE
        FCFBFEFCFBFEFCFBB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEFBF8FEFBF8FEFBF8811E00811E00811E00811E
        00811E00811E00811E00811E00811E00811E00811E00811E00811E00FEFBF8FE
        FBF8FEFBF8FEFBF8B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEFAF6FEFAF6FEFAF6811E00FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFF899FFC7790FCFFFFFFFFFFFFFFFFFF811E00FEFAF6FE
        FAF6FEFAF6FEFAF6B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF8F3FEF8F3FEF8F3811E00FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFF4767FC011FFA1235FBFFFFFFFFFFFFFFFFFF811E00FEF8F3FE
        F8F3FEF8F3FEF8F3B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF7F2FEF7F2FEF7F2811E00FFFFFFFFFFFFFFFF
        FFEAEEFF1D41FB011FFA011FFA011FFAAFBDFEFFFFFFFFFFFF811E00FEF7F2FE
        F7F2FEF7F2FEF7F2B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF6EFFEF6EFFEF6EF811E00FFFFFFFFFFFFC2CE
        FE082AFA011FFA011FFA011FFA011FFA4767FCFFFFFFFFFFFF811E00FEF6EFFE
        F6EFFEF6EFFEF6EFB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF4EDFEF4EDFEF4ED811E00FFFFFF7790FC011F
        FA011FFA011FFA3859FB2A4DFB011FFA011FFAD5DEFEFFFFFF811E00FEF4EDFE
        F4EDFEF4EDFEF4EDB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF3EAFEF3EAFEF3EA811E004767FC011FFA011F
        FA011FFA6782FCFFFFFFAFBDFE011FFA011FFA4767FCFFFFFF811E00FEF3EAFE
        F3EAFEF3EAFEF3EAB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF3E7FEF3E7FEF3E7811E003859FB011FFA082A
        FA9CAFFEFFFFFFFFFFFFFFFFFF2A4DFB011FFA011FFAAFBDFE811E00FEF3E7FE
        F3E7FEF3E7FEF3E7B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF2E6FEF2E6FEF2E6811E00EAEEFF4767FCC2CE
        FEFFFFFFFFFFFFFFFFFFFFFFFFC2CEFE011FFA011FFA1D41FB811E00FEF2E6FE
        F2E6FEF2E6FEF2E6B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEF0E3FEF0E3FEF0E3811E00FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF5775FC011FFA011FFA2D1F74FEF0E3FE
        F0E3FEF0E3FEF0E3B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFEEFE1FEEFE1FEEFE1811E00FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEAEEFF1235FB011FFA011FFA8996EAFE
        EFE1FEEFE1FEEFE1B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFEEDEFFEEDEFFEEDE811E00FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC2CEFE011FFA011FFA0829F8C2
        C0E3FFEEDEFFEEDEB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFEDDCFFEDDCFFEDDC811E00811E00811E00811E
        00811E00811E00811E00811E00811E00811E00811E00461F43011FFA011FFA08
        29F8C2C0E1FFEDDCB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFEBDAFFEBDAFFEBDAFFEBDAFFEBDAFFEBDAFFEB
        DAFFEBDAFFEBDAFFEBDAFFEBDAFFEBDAFFEBDAFFEBDAFFEBDA576DEB011FFA01
        1FFA011FFA7787E9B1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEA
        D8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD8FFEAD88993E501
        1FFA011FFA011FFA1C36DEC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE9D5FFE9D5FFE9D5FFE9D5FFE9D5FFE9D5FFE9
        D5FFE9D5FFE9D5FFE9D5FFE9D5FFE9D5FFE9D5FFE9D5FEE9D4FEE7D4FEE7D49A
        9FE00829F7011FFA011FFA011FFA011FFAC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE7D3FFE7D3FFE7D3FFE7D3FFE7D3FFE7D3FFE7
        D3FFE7D3FFE7D3FFE7D3FFE7D3FFE7D3FEE6D1E5CEBAE1CAB7DDC7B4D9C4B1D5
        C0ADC0B1B03A52DA011FFA011FFA011FFA011FFAC0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE6D0FFE6D0FFE6D0FFE6D0FFE6D0FFE6D0FFE6
        D0FFE6D0FFE6D0FFE6D0FFE6D0FFE6D0FBE3CCCCB7A3C2AD9AB7A492AD9A8AA3
        918299897A9D897E937F9AC0C0C0011FFA011FFAC0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE5CFFFE5CFFFE5CFFFE5CFFFE5CFFFE5CFFFE5
        CFFFE5CFFFE5CFFFE5CFFFE5CFFFE5CFFFE5CFBDA996AC98889D8A7B8C7D6E7D
        6E62907F75BFA39CB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE3CCFFE3CCFFE3CCFFE3CCFFE3CCFFE3CCFFE3
        CCFFE3CCFFE3CCFFE3CCFFE3CCFFE3CCFFE3CCFAF0E7FEFEFEF7F6F4E9E5E1ED
        E0DACEB2ABB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE3CAFFE3CAFFE3CAFFE3CAFFE3CAFFE3CAFFE3
        CAFFE3CAFFE3CAFFE3CAFFE3CAFFE3CAFFE3CAEBD8C6FEFEFEFEFEFCF2E7E2CE
        B2ACB1908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE2C7FFE2C7FFE2C7FFE2C7FFE2C7FFE2C7FFE2
        C7FFE2C7FFE2C7FFE2C7FFE2C7FFE2C7FFE2C7D9C1ACFEFEFEFEF8F4D0B6B0B1
        908EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE1C5FFE1C5FFE1C5FFE1C5FFE1C5FFE1C5FFE1
        C5FFE1C5FFE1C5FFE1C5FFE1C5FFE1C5FFE1C5D1B7A1FEFAF7D0B7B1B1908EC0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFE0C2FFE0C2FFE0C2FFE0C2FFE0C2FFE0C2FFE0
        C2FFE0C2FFE0C2FFE0C2FFE0C2FFE0C2FFE0C2D1BDABD0B7B1B1908EC0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EFFDEC1FFDEC1FFDEC1FFDEC1FFDEC1FFDEC1FFDE
        C1FFDEC1FFDEC1FFDEC1FFDEC1FFDEC1FAD9BDC0A69EB1908EC0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0B1908EB1908EB1908EB1908EB1908EB1908EB1908EB190
        8EB1908EB1908EB1908EB1908EB1908EB1908EB1908EC0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    object BitBtn3: TBitBtn
      Left = 251
      Top = 2
      Width = 77
      Height = 55
      Caption = 'Mat. Prima'
      Enabled = False
      PopupMenu = PopupMenu1
      TabOrder = 8
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0040006000109C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C004000002070A465C6100090F0005
        0CC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0616C64000C060009052A56552C5F61355E
        61000D0C000800C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C060676458655D000300000A0432615F000D0D0006
        0734605F34665C000F08000207C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C06768666465616F706C070806000101416061000608AAC7
        CB000707000A053C5B54416059000500000704C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C06E6F6D6563626563636560610904050002033D595A000D13BBCC
        DFBAC4E2B6BEE600032000080850665A556058020503010004C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C06366646867696460656C686E6E6A6F07050400020045656400000FB3C0
        F4B5B3FF2D219FB1AAFFBAC4DC00080000020064676C585B6900000B000814C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        6464646565656763686A666C66606B63616701020002100A365D5B000319AABA
        FD2A279B2C1BC23222B0C0C1EDD2D9D6CED0D000000300020C546471465C6800
        0208000200C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C06260606D696E69656B625E6964646A0003010007003E6B680000142840
        8221289B201ABF291FB1C1C2FAE4E7EFC6C9C7CAD0CBC5D2D000030500050C49
        6068000608C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C06A666B68646A68676B040705000804325A58000514A8BF
        F1DDE6FFA9A9FF2E2B9FB2B1F5C9CBEA65646DC8CCC6C0CEC3EFFFFC0003074E
        636B000509C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C06963640701020307084B646600060DB6C4
        D7BFC4E3BEC2EBB1B2EC3B3A8AB1ADF4CEC9E466646462695CC8D4C80001044F
        5F66000409C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00D030300000152636600060BC7CF
        D65E6165616665C9CDE6302F7FBDB9FFC6BFE0CDC8C9D4D7C8C6CFC2000D0F51
        5C64000409C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00D0805030604475A5D000308BEC6
        CD68686ECACDCB585C6F4F529639387CF9F3FFD1CDC8CFD2C2C5CEC100000456
        606A000409C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00401000004034F646600060DC9CE
        D7626268FEFFFDC8CAD5535787F1F1FFD4CDDAFFFFF9CBCFC4F6FFFE00030C4E
        5E6B000409C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00907070002054F636800030AF3F8
        FF6E6C72646261FDFEFF5F6075C3C2D6070001100906F0F6FBEDFDFF4D667A45
        5C6C000509C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000001080D104D5D6300040AC7CD
        D2FAF9FDD2D0D065656565646DFFFDFFE7E0DD05060400081318374E10385539
        5B78000312C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0010605000203576363000707C6CB
        CC646869606262EBEDEEFBF8FFE6E4EAEAEBE2000801D6FFFFBAF3FF00366001
        35633E5E82C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000403000605565E5D000201FAFF
        FF5D6362FBFFFF5E60616A666CFEFBFDFFFFFBECFBF71E434BBFFBFF003A6241
        96C6003967063354C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000403030908565E5D000807C9CF
        CE646A69C0C5C4FDFFFF676564FFFDFEFFFEFFFDFEFFF5FDFF0B38455AC9E340
        C5EA2496BF003961003150C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0060B0A0001005C6261000504FAFF
        FF5E6463676C6BF6F8F8686665FFFEFF5F5B61FFFDFFFFFDFFE0FFFF00415544
        CAE840C9F02099C5003C68003655C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000302000100616766000302F8FE
        FDF9FFFEFBFFFF636566626367FDFEFFFDFDFF57575D61636BECFCFF00051800
        3D5940C3EE37CBFA1794C6003B5C124145C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0090B0B000302616766000302F9FF
        FEF9FEFDFCFEFEFDFFFFFBFFFFF3F8FBFBFEFFFDFDFFFAFCFFF6FCFF00000D2D
        5F75003E6444C7E84CD7E032A6A7002127021C28C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00002020001005B61600107060003
        02FBFFFF000000060907F3FEF4F8FFFBFDFEFFFDF9FFFFFCFFF3F7FC0005073C
        636B000018034949007B3339B671569EA6001045041050C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00204040106050006056167666065
        64000101090909929691060E03000400FAFCFCFFFDFFFFFDFFFBFFFF000D0744
        6360000511C0C0C000470047A564001D3D153086000461010362C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0080D0C0001000004030406
        066264640606069A98979C99919D9B93000100000302FDFFFFF8FFFE000A0049
        6558000600C0C0C0C0C0C007212F00024F28329E282A96000069C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00106050204
        04050707000000CEC9CAD3C9C998918E9D9E9A666D68000201F1FFFB00060050
        685E000903C0C0C0C0C0C0C0C0C0100F5900005507075BC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0080A0A6767670D080A6A616BD6CFD4C7C8C4000801000602EFFFFF000E0C4D
        5E6100000DC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0000000686666040103D0C8D269656B000301818C846977710003000006074B
        5B62000012C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0080808686666060404FFFDFCFFFFFE0000010007060005007F9087627B7751
        666800000CC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C00000000604046B6968010300030702070C0F000001090A0600070000040074
        8685000207C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0050302040705C0C0C0C0C0C0C0C0C0C0C0C0120A0A05090400
        0400000503C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    object Panel3: TPanel
      Left = 245
      Top = 2
      Width = 4
      Height = 56
      BevelInner = bvRaised
      Color = clTeal
      PopupMenu = PopupMenu1
      TabOrder = 9
    end
    object BitBtn2: TBitBtn
      Left = 408
      Top = 2
      Width = 77
      Height = 55
      Caption = 'Imp. Etiqueta'
      PopupMenu = PopupMenu1
      TabOrder = 10
      OnClick = BitBtn2Click
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888888888888888888888888888888888888888888888888800000000000
        0000000000000000008880777777777777777777777777777088070000000000
        000000000000000000080F7777777777777777777777777777080F7777777777
        777777777777777777080F77F7F7F7F7F7F7F7F7F7F7F77777080F77FFFFFFFF
        FFFFFFFFFFFFF77777080F7777777777777777777777F77777080F7700000000
        000000000000F72277080F777777777777777777777777AA77080F7777777777
        777777777777777777080F7F7F7F7F7F7F7F7F7F7F7F7F7F7F080FFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF080F77777777777777777777777777770880F700000000
        0000000000000777708880F87088888888888888880077777088880F808F8F8F
        8F8F8F8F8F0777770888880880FFFFFFFFFFFFFFFF0777770888888000FFFFFF
        FFFFFFFFFF0000008888888880FFFFFFFFFFFFFFFF0888888888888880FFFFFF
        FFFFFFFFFF0888888888888880FFFFFFFFFFFF88880888888888888880FFFFFF
        FFFFF700070888888888888880FFFFFFFFFFF7FFF08888888888888880FFFFFF
        FFFFF7FF088888888888888880FFFFFFFFFFF7F0888888888888888880FFFFFF
        FFFFF70888888888888888888000000000000088888888888888888888888888
        8888888888888888888888888888888888888888888888888888}
      Layout = blGlyphTop
    end
    object RadioButton1: TRadioButton
      Left = 411
      Top = 14
      Width = 15
      Height = 17
      Checked = True
      TabOrder = 11
      TabStop = True
    end
    object RadioButton2: TRadioButton
      Left = 465
      Top = 14
      Width = 15
      Height = 17
      TabOrder = 12
    end
    object BitBtn4: TBitBtn
      Left = 486
      Top = 2
      Width = 77
      Height = 55
      Caption = 'Imprimir'
      PopupMenu = PopupMenu1
      TabOrder = 13
      OnClick = BitBtn4Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0999697999697999697C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0999697999697999697C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0999697ABA8A9A7A5A5A29FA09B9899999697999697C0C0
        C0C0C0C0999697999697D9D7D8DFDEDEBEBCBD999697999697999697C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0999697A9A7A7EFEFEFB5B3B3B5B3B3B5B3B3B0AEAFA4A2A38987
        88939192BBB9BADCDCDCE2E2E2E4E3E3E5E5E5E6E5E5D7D7D7BBB9B999969799
        9697999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0999697B8B6B7E9E8E8EFEFEFBFBEBEB5B3B3B5B3B3B5B3B3B5B3B39E9D
        9D282828787878BDBCBCD7D7D7D8D8D8DAD9D9DBD9DADBDBDBDCDCDCDEDDDDD1
        D0D0B7B5B5999697999697999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        999697BBB9B9E8E7E7E9E8E8E9E8E8BBBABAB5B3B3B5B3B3B5B3B3B5B3B38886
        86000000000000000000282828787878BBBBBBD6D6D6D6D6D6D6D6D6D6D6D6D6
        D6D6D7D7D7D7D7D7CBCBCBB4B2B3999697999697999697C0C0C0C0C0C0999697
        C5C4C4E1E1E1E2E2E2E2E2E2DAD9D9AEACACAEACACAEACACB0AEAFB5B3B37170
        70000000000000000000000000000000000000282828787878BBBBBBD6D6D6D6
        D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6B0AEAF999697999697999697C5C4C4
        DBDBDBDBDBDBDCDCDCD0CFD09D9B9CA09D9EA09D9EA09D9E9D9A9B9996979996
        97737171605E5E4D4B4C26262600000000000000000000000000000028282878
        7878BBBBBBD6D6D6D6D6D6C7C6C6A4A2A3999697C0C0C0C0C0C0999697D6D6D6
        D6D6D6D6D6D6CBCBCB9D9A9BA8A4A4C6C4C4B5B3B3B5B3B3B5B3B3B5B3B3B3B1
        B1AEACACA9A7A7A4A2A39E9B9C9996977C7A7B4D4B4C1D1C1C00000000000000
        00000000002828287E7E7E9996979B9899C0C0C0C0C0C0C0C0C0999697D6D6D6
        D6D6D6CBCBCB9D9A9BACAAAAE9E8E8F9F8F8F7F6F6E5E5E5D7D7D7C8C6C6B8B6
        B7B5B3B3B5B3B3B5B3B3B5B3B3B3B1B1ACAAAAA4A1A29B989986838443424213
        13130000000000002C2B2BA4A1A2A4A1A2999697C0C0C0C0C0C0999697D6D6D6
        D2D2D2A4A2A3B3B1B2F2F1F1F9F8F8F9F8F8F8F7F7F6F5F5F3F3F3F1F1F1EFEF
        EFE2E2E2D2D2D2C5C4C4B8B6B7B5B3B3B5B3B3B5B3B3B5B3B3ACAAAAA4A1A299
        9697605E5E131313393838B5B3B3B5B3B39D9A9BC0C0C0C0C0C0999697D2D2D2
        A4A2A3BDBBBBF6F5F5F9F8F8F9F8F8F9F8F8F8F7F7F6F5F5F4F3F3F2F1F1EFEF
        EFEEEDEDEBEBEBE9E9E9E7E7E7D9D7D8C9C8C8BDBCBCB5B3B3B5B3B3B5B3B3B2
        AFB0A7A5A59B98998D8B8BB2AFB0B5B3B3999697C0C0C0C0C0C0999697A4A2A3
        D0CECEF9F8F8F9F8F8F9F8F8F9F8F8F9F8F8F8F7F7F6F5F5C9C5C6AEA6A8D0CE
        CEEEEDEDECEBEBEAE9E9E8E7E7E5E5E5E4E3E3E1E1E1DBD9DACCCBCBC1C0C0B5
        B3B3B5B3B3B3B1B1A4A1A29B9899A29FA0999697C0C0C0C0C0C0999697E1E1E1
        F9F8F8F9F8F8F9F8F8F9F8F8F9F8F8F9F8F8F8F7F7DBD9DAA69FA093888A7F70
        727D6F719E9597C4C1C1DEDDDDE6E5E5E4E3E3E2E1E1E0DFDFDEDDDDDBDBDBD7
        D7D7C9C7C8BBBABAB5B3B3B0AEAFA09D9E999697C0C0C0C0C0C0999697C9C7C8
        F9F8F8F9F8F8F9F8F8F9F8F8F9F8F8F9F8F8C6C3C3BEBCBDC7C5C6C5C4C4BEBB
        BCB1ABACA097988C808280727593888AB3ADAED4D3D3E0DFDFDEDDDDDCDBDBDA
        D9D9D7D7D7D6D6D6CECDCDC1C0C0AEACAC999697C0C0C0C0C0C0C0C0C0999697
        999697E1E1E1F9F8F8F9F8F8F9F8F8A69D9F7767698C7F829F9698AFA9AABBB9
        B9C4C2C3C7C6C6C4C2C3BAB6B7ABA5A6998F91897C7F8A7F81A59D9FC4C2C3D5
        D5D5D8D8D8D6D6D6D6D6D6D6D6D6B7B6B6999697C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0999697999697D5D3D4D8C9C9A48A7C6B53515740445E494C6B595D7E6F
        7193888AA59D9FB3AEAFBEBCBDC5C4C4C7C5C6C1BFBFB5B1B2A59E9F958B8DD2
        D1D1D8D8D8D6D6D6D6D6D6BFBEBE999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C09D9697A99B9AFFDFBDFFDCB7EBC4A7C09E85876B636148
        49594246624D51715F6385787A998F91AAA3A4B7B5B5C1C0C0C4C2C3CECDCDDB
        D9DAD8D8D8D6D6D6B0AEAF999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0CC9A99FFE0C0FFDEBBFFDBB6FFD9B1FFD6ABFFD3
        A6D5AC89A07E6A765A53563F435B454966535678676A8E8385C8C6C6DCDCDCDB
        D9DAD0CFD0A4A2A3999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0CC9A99FFE3C6FFE0C0FFDEBBFFDBB5FFD8AFFFD5
        AAFFD3A5FFD09FFFCE9AF4C494C09879876B636B595DC2BEBFDFDEDEDCDCDCBE
        BCBD9D9A9B999697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0CC9A99FFE5CAFFE2C5FFE0BFFFDDBAFFDAB3FFD8
        AFFFD5A9FFD3A5FFCF9EFFCD9AFFCD99C6A5989D969799969799969799969799
        9697C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0CC9A99ECCCBEFFE7CFFFE5C9FFE2C5FFDFBEFFDDB9FFDA
        B3FFD7ADFFD4A7FFD2A2FFCF9EFFCD99D2A19AC0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0CC9A99F4DCCDFFEAD3FFE7CFFFE4C7FFE1C3FFDFBDFFDC
        B7FFD9B2FFD7ADFFD4A7FFD2A2FCCB9CCC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0CF9F9DFFEEDDFFECD8FFE9D2FFE6CDFFE4C7FFE1C3FFDE
        BBFFDBB6FFD9B1FFD6ABFFD3A6EFC09FCC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0CC9A99FFF1E2FFEEDDFFEBD7FFE9D1FFE6CDFFE3C6FFE0
        C0FFDEBBFFDBB5FFD8AFFFD5AACC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0CC9A99EED5CDFFF3E7FFF0E1FFEDDBFFEBD7FFE7CFFFE5CAFFE2
        C5FFE0BFFFDDBAFFDAB3FFD8AFCC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0CC9A99FCF2EBFFF4EAFFF2E5FFF0E1FFEDDBFFEAD4FFE7CFFFE5
        C9FFE2C5FFDFBEFFDDB9EBC4A7CC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0CC9A99DFBEBBFFFAF5FFF7EEFFF4EAFFF2E5FFEFDFFFECD8FFEAD3FFE7
        CFFFE4C7FFE2C3FFDFBDD2A29DC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0CC9A99F9EFEBFFFBF7FFF9F4FFF7EEFFF4EAFFF1E2FFEEDDFFECD8FFE9
        D2FFE6CDFFE4C7ECC7B3CC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        CC9A99DCB8B6F5E9E5FFFBF7FFFBF7FFF9F3FFF7EEFFF3E7FFF1E2FFEEDDFFEB
        D7FFE9D1F9DCC6CF9F9DC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        CC9A99CC9A99CC9A99CC9A99CC9A99CC9A99DFBEBBE6C8C2EED5CDF4DCCDFFEE
        DBFCE6D2D8ABA4CC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CC9A99CC9A99CC9A99CC9A99CC9A
        99CC9A99CC9A99C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
  end
  inherited MMJPanel2: TMMJPanel
    Top = 497
    Width = 792
    Height = 27
    Align = alBottom
    inherited Label1: TLabel
      Top = 64
    end
    inherited Label2: TLabel
      Top = 65
    end
    object Label15: TLabel
      Left = 8
      Top = 7
      Width = 266
      Height = 13
      Caption = 'Entrada de Mercadorias em Estoque - Compras'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object GroupBox1: TGroupBox [3]
    Left = 0
    Top = 63
    Width = 489
    Height = 48
    Caption = 'FORNECEDOR'
    PopupMenu = PopupMenu1
    TabOrder = 2
    object dbeCliente: TDBEdit
      Left = 5
      Top = 16
      Width = 52
      Height = 24
      DataField = 'CODFORNECEDOR'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnExit = dbeClienteExit
      OnKeyPress = dbeClienteKeyPress
    end
    object btnClienteProcura: TBitBtn
      Left = 448
      Top = 8
      Width = 35
      Height = 38
      Enabled = False
      TabOrder = 1
      TabStop = False
      OnClick = btnClienteProcuraClick
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00090909001212
        12001F1F1F002C2C2C003939390045454500525252005F5F5F006C6C6C007878
        780085858500929292009F9F9F00ABABAB00B8B8B800C5C5C500D2D2D200DEDE
        DE00EBEBEB00F8F8F800F0FBFF00A4A0A000C0DCC000F0CAA60000003E000000
        5D0000007C0000009B000000BA000000D9000000F0002424FF004848FF006C6C
        FF009090FF00B4B4FF0000143E00001E5D0000287C0000329B00003CBA000046
        D9000055F000246DFF004885FF006C9DFF0090B5FF00B4CDFF00002A3E00003F
        5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
        FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
        D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
        3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
        CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
        460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
        0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
        6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
        000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
        0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
        6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
        0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
        00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
        6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
        0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
        00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
        6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
        4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
        3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
        CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
        D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
        5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
        FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
        D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF00070707070704
        0404070404040707070707070707444407444407070707070707070707070704
        0404070404040707070707070707444407444407070707070707070707070704
        0404070404040707070707070707444407444407070707070707070707070704
        0404070404040707070707070707444407444407070707070707070707070704
        0404070404040700000707070707444407444407070707070707070707070704
        0404070404040700000707070707444407444407070707070707070707070704
        0404070404040700000707070707444407444407070707070707070707070704
        040407040404070000070707072F2F2F2F2F2F2F070707070707070707070704
        040407040404070000070707072F2F2F2F2F2F2F070707070707070707460708
        040408040404070000070707462F2F2F2F2F2F2F460707070707070746460804
        040404040404080046070746462F2F2F2F2F2F2F464607070707070707070804
        040404040404084646080746080C0C0C0C0C0C0C084607070707070704040804
        040404040404080708070700000C0C0C040C0C0C000007070707070704040804
        04040404040408040407070C0C040C0C0C0C0C040C0C07070707070704040704
        04040404040408040407070C0C040C0C040C0C040C0C07070707070704040804
        04040504040407040407070C0C040C0C0C0C0C040C0C07070707070704040404
        04080508040408040407070C0C040C0C000C0C040C0C07070707070708040404
        04070507040404040407070C0C040C0C000C0C040C0C07070707070707040404
        040F050F040404040807070C0C040C0007000C040C0C07070707070707040404
        040F050F040404040707070C0C0C0C080F08000C0C0C07070707070707040404
        040F050F040404040707070C0C0C000F0C0F000C0C0C07070707070707040404
        040F050F04040408070707080C0C000F0C0F000C0C0807070707070707070404
        070F0F0F0404080707070707080C000C000C0000080707070707070707070707
        0707000707070707070707070707070046000707070707070707070707070707
        0700460007070707070707070708004646460008070707070707070707070707
        0846464608070707070707070700004646460000070707070707070707070707
        0046464600070707070707070707000046000007070707070707070707070707
        0000000000070707070707070707000000000007070707070707070707070707
        0800000008070707070707070707070000000707070707070707070707070707
        0708000807070707070707070707070808080707070707070707070707070707
        0707070707070707070707070707070707070707070707070707070707070707
        0707070707070707070707070707070707070707070707070707}
    end
    object DBEdit3: TDBEdit
      Left = 57
      Top = 16
      Width = 389
      Height = 24
      TabStop = False
      Color = clInfoBk
      DataField = 'NOMEFORNECEDOR'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      ReadOnly = True
      TabOrder = 2
      OnKeyPress = FormKeyPress
    end
  end
  object GroupBox2: TGroupBox [4]
    Left = 489
    Top = 63
    Width = 184
    Height = 48
    Caption = 'CENTRO RESULTADO'
    PopupMenu = PopupMenu1
    TabOrder = 3
    object ComboBox1: TComboBox
      Left = 4
      Top = 16
      Width = 176
      Height = 24
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
  end
  object GroupBox3: TGroupBox [5]
    Left = 674
    Top = 63
    Width = 109
    Height = 48
    Caption = 'DATA COMPRA'
    PopupMenu = PopupMenu1
    TabOrder = 4
    object DBEdit2: TDBEdit
      Left = 4
      Top = 16
      Width = 100
      Height = 24
      DataField = 'DATAMOVIMENTO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
  end
  object GroupBox4: TGroupBox [6]
    Left = 634
    Top = 111
    Width = 149
    Height = 48
    Caption = 'CONTROLE'
    PopupMenu = PopupMenu1
    TabOrder = 5
    object DBEdit1: TDBEdit
      Left = 4
      Top = 19
      Width = 141
      Height = 24
      DataField = 'CONTROLE'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
    object dbLote: TDBComboBox
      Left = 6
      Top = 20
      Width = 140
      Height = 21
      DataField = 'CONTROLE'
      DataSource = DtSrc
      ItemHeight = 13
      TabOrder = 1
      Visible = False
      OnChange = dbLoteChange
      OnKeyPress = FormKeyPress
    end
  end
  object DBMemo1: TDBMemo [7]
    Left = 635
    Top = 253
    Width = 148
    Height = 108
    TabStop = False
    Color = clInfoBk
    DataField = 'OBS'
    DataSource = DtSrc
    PopupMenu = PopupMenu1
    ReadOnly = True
    TabOrder = 6
  end
  object GroupBox5: TGroupBox [8]
    Left = 634
    Top = 161
    Width = 150
    Height = 66
    Caption = 'TOTAL R$.'
    PopupMenu = PopupMenu1
    TabOrder = 7
    object DBEdit4: TDBEdit
      Left = 8
      Top = 17
      Width = 134
      Height = 33
      TabStop = False
      BorderStyle = bsNone
      Color = clInfoBk
      DataField = 'TotalPedido'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      ReadOnly = True
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
  end
  object GroupBox6: TGroupBox [9]
    Left = 0
    Top = 111
    Width = 633
    Height = 378
    Caption = 'MERCADORIAS'
    TabOrder = 8
    object Label3: TLabel
      Left = 6
      Top = 18
      Width = 33
      Height = 13
      Caption = 'C'#243'digo'
    end
    object Label5: TLabel
      Left = 127
      Top = 18
      Width = 17
      Height = 13
      Caption = 'Un.'
    end
    object Label6: TLabel
      Left = 167
      Top = 18
      Width = 23
      Height = 13
      Caption = 'Qtde'
    end
    object Label7: TLabel
      Left = 230
      Top = 18
      Width = 39
      Height = 13
      Caption = 'Unit. R$'
    end
    object Label8: TLabel
      Left = 361
      Top = 18
      Width = 22
      Height = 13
      Caption = 'Icms'
    end
    object Label9: TLabel
      Left = 420
      Top = 18
      Width = 41
      Height = 13
      Caption = 'Total R$'
    end
    object Label4: TLabel
      Left = 302
      Top = 18
      Width = 11
      Height = 13
      Caption = 'Ipi'
    end
    object dbeProduto: TDBEdit
      Left = 6
      Top = 34
      Width = 85
      Height = 24
      DataField = 'CODPRO'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnExit = dbeProdutoExit
      OnKeyPress = dbeProdutoKeyPress
    end
    object btnProdutoProcura: TBitBtn
      Left = 91
      Top = 33
      Width = 35
      Height = 26
      Enabled = False
      PopupMenu = PopupMenu1
      TabOrder = 1
      TabStop = False
      OnClick = btnProdutoProcuraClick
      Glyph.Data = {
        C2070000424DC20700000000000036000000280000001E000000150000000100
        1800000000008C070000120B0000120B00000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A01F70A01F80AF0070
        A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBF108FBF2F8FB00F0F0F0000001F4F600F7FB0
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBF0070A020AFDF3FCFFF50909FF0C090806F500000002F607FBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F70AF
        108FC03FCFFF3FCFFF50909FFFCF9FFFCF9F4F4030101F1F2F80B0BFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00609F1F9FCF3FCFFF1F9FCF3F
        CFFF4FCFFF50A0BFF0C090FFCF9FAF8F6F0000005F90B0BFBFBFBFBFBF005080
        2F80B000609FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF0F7FB02FBFEF3FCFFF3FCFFF2090C070DFFF90E0
        FFAFE0FFAF9F80FFCF9FCFA080000000508FAF00609F409FC0609FB01F1F1F1F
        30400F70A0BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBF108FC03FCFFF40CFFF5FD0FF7FDFFF409FC0AFE0FFD0F0FFE0F0FF
        EFEFF0A09080806F50304F5F308FBF80D0F07FDFFF5F8F9F9F8060000000102F
        3F00609FBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF0070A01080
        BF4FD0FF6FD0FF8FDFFFA0E0FFC0EFFFBFE0F05F9FC0F0FFFFF0FFFFDFF0FFBF
        E0FF5FAFCF0F90C050C0EF50D0FF3FCFFF50909FFFCF9F6F5F400000000F5F80
        BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF0F7FAF30AFDF4FAFDF90E0FF
        AFEFFFCFEFFFDFF0FFEFFFFFF0FFFF2F9FC02F9FC060BFDF409FC00F8FB00070
        A000AFD030BFEF3FCFFF3FCFFF309FBFF0C090CFA0800000001F709FBFBFBFBF
        BFBFBFBFBFBFBFBF0000BFBFBFBFBFBF00609F90DFFF3F8FBFD0F0FFE0F0FFF0
        FFFFF0FFFFE0F0FFCFF0FF90D0EF1F9FCF00A0CF0090C000AFD00080B000AFD0
        20BFEF3FCFFF3FCFFF3FCFFF809080CFA0800000001F6F90BFBFBFBFBFBFBFBF
        BFBFBFBF0000BFBFBFBFBFBF00609FD0F0FF80BFD07FB0CFF0FFFFDFF0FFC0EF
        FFAFE0FF8FDFFF70DFFF50D0FF1FA0D00070AF0090C0007FAF00A0CF0F9FCF3F
        CFFF3FCFFF3FCFFF3FC0F050808000304F0070A0BFBFBFBFBFBFBFBFBFBFBFBF
        0000BFBFBFBFBFBF00609F8FBFD0D0E0F02F80AF207FAF60B0DF60BFDF60D0FF
        4FCFFF3FCFFF3FCFFF3FCFFF30C0FF1F9FD00090BF00A0CF00A0CF10A0D030C0
        FF1FAFDF1090C00070AF005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBF
        BFBFBFBFBFBFBF00609F00609FBFBFBFBFBFBF0F70A020A0D020A0DF20A0DF30
        C0FF3FCFFF3FCFFF3FCFFF3FCFFF30C0FF20A0DF006F9F0070A0005080BFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0F7FAF20AFDF108FC01F9F
        CF109FD01090C0007FB0006F9F005080BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0070A0007FAF00609FBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBF0000}
    end
    object DBEdit8: TDBEdit
      Left = 127
      Top = 34
      Width = 40
      Height = 24
      TabStop = False
      Color = clInfoBk
      DataField = 'UN'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      ReadOnly = True
      TabOrder = 2
      OnKeyPress = FormKeyPress
    end
    object DBEdit9: TDBEdit
      Left = 167
      Top = 34
      Width = 59
      Height = 24
      DataField = 'QUANTIDADE'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 3
      OnExit = DBEdit9Exit
      OnKeyPress = FormKeyPress
    end
    object DBEdit10: TDBEdit
      Left = 228
      Top = 34
      Width = 70
      Height = 24
      DataField = 'PRECO'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 4
      OnKeyPress = FormKeyPress
    end
    object DBEdit11: TDBEdit
      Left = 355
      Top = 34
      Width = 59
      Height = 24
      DataField = 'ICMS'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 6
      OnExit = DBEdit11Exit
      OnKeyPress = FormKeyPress
    end
    object DBEdit12: TDBEdit
      Left = 416
      Top = 34
      Width = 80
      Height = 24
      Color = clInfoBk
      DataField = 'ValorTotal'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 7
      OnExit = DBEdit12Exit
      OnKeyPress = FormKeyPress
    end
    object btnNovo: TBitBtn
      Left = 496
      Top = 33
      Width = 41
      Height = 25
      Caption = 'Novo'
      PopupMenu = PopupMenu1
      TabOrder = 8
      OnClick = btnNovoClick
    end
    object BitBtn8: TBitBtn
      Left = 538
      Top = 33
      Width = 41
      Height = 25
      Caption = 'Excluir'
      PopupMenu = PopupMenu1
      TabOrder = 9
      OnClick = BitBtn8Click
      NumGlyphs = 2
    end
    object DBEdit5: TDBEdit
      Left = 300
      Top = 34
      Width = 54
      Height = 24
      DataField = 'QTDE_ALT'
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 5
      OnExit = DBEdit5Exit
      OnKeyPress = FormKeyPress
    end
    object btnRateio: TBitBtn
      Left = 580
      Top = 33
      Width = 41
      Height = 25
      Caption = 'Rateio'
      PopupMenu = PopupMenu1
      TabOrder = 10
      OnClick = btnRateioClick
      NumGlyphs = 2
    end
    object DBGrid1: TJvDBGrid
      Left = 6
      Top = 59
      Width = 616
      Height = 315
      DataSource = DtSrc1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 11
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnTitleClick = JvDBGrid1TitleClick
      AlternateRowColor = 16776176
      AutoSizeColumns = True
      SelectColumnsDialogStrings.Caption = 'Select columns'
      SelectColumnsDialogStrings.OK = '&OK'
      SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
      EditControls = <>
      RowsHeight = 17
      TitleRowHeight = 17
      Columns = <
        item
          Expanded = False
          FieldName = 'CODPRO'
          Title.Caption = 'C'#243'digo'
          Width = 72
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PRODUTO'
          Title.Caption = 'Mercadoria'
          Width = 303
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PRECO'
          Title.Caption = 'Unit.'
          Width = 66
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'QUANTIDADE'
          Title.Caption = 'Qtde'
          Width = 41
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ValorTotal'
          Title.Caption = 'Total R$'
          Width = 66
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LOTE'
          Title.Caption = 'Lotes'
          Width = 46
          Visible = True
        end>
    end
  end
  object CheckBox1: TCheckBox [10]
    Left = 640
    Top = 368
    Width = 97
    Height = 17
    Caption = '1 % Desconto'
    TabOrder = 9
    Visible = False
  end
  object GroupBox7: TGroupBox [11]
    Left = 635
    Top = 400
    Width = 150
    Height = 89
    Caption = 'PLACA DO VE'#205'CULO'
    PopupMenu = PopupMenu1
    TabOrder = 10
    Visible = False
    object Label10: TLabel
      Left = 8
      Top = 62
      Width = 38
      Height = 13
      Caption = 'Label10'
    end
    object MaskEdit1: TMaskEdit
      Left = 8
      Top = 26
      Width = 104
      Height = 28
      EditMask = '>LLL-9999;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 8
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
      Text = '   -    '
      OnExit = MaskEdit1Exit
      OnKeyPress = FormKeyPress
    end
    object BitBtn9: TBitBtn
      Left = 114
      Top = 25
      Width = 31
      Height = 28
      TabOrder = 1
      OnClick = BitBtn9Click
    end
  end
  inherited XPMenu1: TXPMenu
    Left = 720
  end
  inherited PopupMenu1: TPopupMenu
    Left = 688
    inherited Procurar1: TMenuItem
      OnClick = btnProcurarClick
    end
    object Finalizar1: TMenuItem [4]
      Caption = 'Finalizar'
      ShortCut = 117
      OnClick = BitBtn1Click
    end
    object IncluirProduto1: TMenuItem
      Caption = 'Incluir Produto'
      ShortCut = 45
      OnClick = btnNovoClick
    end
    object ExcluiProduto1: TMenuItem
      Caption = 'Exclui Produto'
      ShortCut = 46
      OnClick = BitBtn8Click
    end
  end
  inherited DtSrc: TDataSource
    DataSet = cds_Movimento
    Left = 168
    Top = 256
  end
  object sds_Movimento: TSQLDataSet
    CommandText = 
      'select mov.*'#13#10'        , cli.NOMECLIENTE'#13#10'        , cli.OBS'#13#10'    ' +
      '    , vei.PLACA'#13#10'        , vei.MARCA_MODELO'#13#10'        , usu.NOMEU' +
      'SUARIO'#13#10'        , forn.NOMEFORNECEDOR'#13#10'        , nat.DESCNATUREZ' +
      'A'#13#10'        , alm.NOME AS ALMOXARIFADO'#13#10'        , nat.TIPOTITULO'#13 +
      #10'        , nat.BAIXAMOVIMENTO '#13#10'from MOVIMENTO mov '#13#10'left outer ' +
      'join CLIENTES cli on cli.CODCLIENTE = mov.CODCLIENTE '#13#10'left oute' +
      'r join VEICULO vei on vei.COD_VEICULO = mov.COD_VEICULO '#13#10'left o' +
      'uter join USUARIO usu on usu.CODUSUARIO = mov.CODUSUARIO '#13#10'left ' +
      'outer join FORNECEDOR forn on forn.CODFORNECEDOR =  mov.CODFORNE' +
      'CEDOR '#13#10'inner join NATUREZAOPERACAO nat on  nat.CODNATUREZA = mo' +
      'v.CODNATUREZA '#13#10'left outer join PLANO alm on alm.CODIGO =  mov.C' +
      'ODALMOXARIFADO where mov.CODMOVIMENTO = :pCODMOV'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'pCODMOV'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 72
    Top = 255
    object sds_MovimentoCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object sds_MovimentoDATAMOVIMENTO: TDateField
      FieldName = 'DATAMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_MovimentoCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoCODNATUREZA: TSmallintField
      FieldName = 'CODNATUREZA'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_MovimentoSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_MovimentoCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_MovimentoNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      ProviderFlags = []
      Size = 50
    end
    object sds_MovimentoDESCNATUREZA: TStringField
      FieldName = 'DESCNATUREZA'
      ProviderFlags = []
      Size = 30
    end
    object sds_MovimentoALMOXARIFADO: TStringField
      FieldName = 'ALMOXARIFADO'
      ProviderFlags = []
      Size = 30
    end
    object sds_MovimentoCODVENDEDOR: TSmallintField
      FieldName = 'CODVENDEDOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoNOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      ProviderFlags = []
      Size = 50
    end
    object sds_MovimentoCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoTIPOTITULO: TSmallintField
      FieldName = 'TIPOTITULO'
      ProviderFlags = []
      ReadOnly = True
    end
    object sds_MovimentoDATA_SISTEMA: TSQLTimeStampField
      FieldName = 'DATA_SISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoNOMEUSUARIO: TStringField
      FieldName = 'NOMEUSUARIO'
      ProviderFlags = []
      Size = 30
    end
    object sds_MovimentoOBS: TStringField
      FieldName = 'OBS'
      ProviderFlags = []
      Size = 200
    end
    object sds_MovimentoPLACA: TStringField
      FieldName = 'PLACA'
      ProviderFlags = []
      Size = 10
    end
    object sds_MovimentoMARCA_MODELO: TStringField
      FieldName = 'MARCA_MODELO'
      ProviderFlags = []
      Size = 60
    end
    object sds_MovimentoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_MovimentoBAIXAMOVIMENTO: TSmallintField
      FieldName = 'BAIXAMOVIMENTO'
      ProviderFlags = []
    end
    object sds_MovimentoCONTROLE: TStringField
      FieldName = 'CONTROLE'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
  end
  object dsp_Movimento: TDataSetProvider
    DataSet = sds_Movimento
    UpdateMode = upWhereKeyOnly
    Left = 103
    Top = 255
  end
  object cds_Movimento: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'pCODMOV'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_Movimento'
    OnNewRecord = cds_MovimentoNewRecord
    OnReconcileError = cds_MovimentoReconcileError
    Left = 135
    Top = 255
    object cds_MovimentoCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object cds_MovimentoDATAMOVIMENTO: TDateField
      FieldName = 'DATAMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      EditMask = '!99/99/00;1;_'
    end
    object cds_MovimentoCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoCODNATUREZA: TSmallintField
      FieldName = 'CODNATUREZA'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_MovimentoSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_MovimentoCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_MovimentoNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      ProviderFlags = []
      Size = 50
    end
    object cds_MovimentoDESCNATUREZA: TStringField
      FieldName = 'DESCNATUREZA'
      ProviderFlags = []
      Size = 30
    end
    object cds_MovimentoALMOXARIFADO: TStringField
      FieldName = 'ALMOXARIFADO'
      ProviderFlags = []
      Size = 30
    end
    object cds_MovimentoCODVENDEDOR: TSmallintField
      FieldName = 'CODVENDEDOR'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoNOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      ProviderFlags = []
      Size = 50
    end
    object cds_MovimentoCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoTIPOTITULO: TSmallintField
      FieldName = 'TIPOTITULO'
      ProviderFlags = []
      ReadOnly = True
    end
    object cds_MovimentoDATA_SISTEMA: TSQLTimeStampField
      FieldName = 'DATA_SISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoNOMEUSUARIO: TStringField
      FieldName = 'NOMEUSUARIO'
      ProviderFlags = []
      Size = 30
    end
    object cds_MovimentoOBS: TStringField
      FieldName = 'OBS'
      ProviderFlags = []
      Size = 200
    end
    object cds_MovimentoPLACA: TStringField
      FieldName = 'PLACA'
      ProviderFlags = []
      Size = 10
    end
    object cds_MovimentoMARCA_MODELO: TStringField
      FieldName = 'MARCA_MODELO'
      ProviderFlags = []
      Size = 60
    end
    object cds_MovimentoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_MovimentoBAIXAMOVIMENTO: TSmallintField
      FieldName = 'BAIXAMOVIMENTO'
      ProviderFlags = []
    end
    object cds_MovimentoCONTROLE: TStringField
      FieldName = 'CONTROLE'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
  end
  object DtSrc1: TDataSource
    DataSet = cds_Mov_det
    OnDataChange = DtSrc1DataChange
    Left = 169
    Top = 287
  end
  object cds_Mov_det: TClientDataSet
    Aggregates = <>
    AggregatesActive = True
    Params = <
      item
        DataType = ftInteger
        Name = 'CODDETALHE'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pCODMOV'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_Mov_det'
    BeforePost = cds_Mov_detBeforePost
    OnCalcFields = cds_Mov_detCalcFields
    OnNewRecord = cds_Mov_detNewRecord
    OnReconcileError = cds_Mov_detReconcileError
    Left = 136
    Top = 287
    object cds_Mov_detCODDETALHE: TIntegerField
      FieldName = 'CODDETALHE'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_Mov_detCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_Mov_detCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_Mov_detICMS: TFloatField
      FieldName = 'ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_Mov_detPRECO: TFloatField
      FieldName = 'PRECO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',#.00'
      currency = True
    end
    object cds_Mov_detQUANTIDADE: TFloatField
      FieldName = 'QUANTIDADE'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.0'
      EditFormat = ',##0.0'
    end
    object cds_Mov_detPRODUTO: TStringField
      DisplayWidth = 50
      FieldName = 'PRODUTO'
      ProviderFlags = []
      Required = True
      Size = 200
    end
    object cds_Mov_detUN: TStringField
      FieldName = 'UN'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 2
    end
    object cds_Mov_detValorTotal: TCurrencyField
      FieldKind = fkInternalCalc
      FieldName = 'ValorTotal'
      ProviderFlags = []
      DisplayFormat = ',#.00'
    end
    object cds_Mov_detQTDE_ALT: TFloatField
      FieldName = 'QTDE_ALT'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.0'
      EditFormat = ',##0.0'
    end
    object cds_Mov_detBAIXA: TStringField
      FieldName = 'BAIXA'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cds_Mov_detCONTROLE: TSmallintField
      FieldName = 'CONTROLE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_Mov_detCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = []
    end
    object cds_Mov_detALMOXARIFADO: TStringField
      FieldName = 'ALMOXARIFADO'
      ProviderFlags = []
      Size = 30
    end
    object cds_Mov_detVALORUNITARIOATUAL: TFloatField
      FieldName = 'VALORUNITARIOATUAL'
      ProviderFlags = []
    end
    object cds_Mov_detCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_Mov_detCONTA_DESPESA: TStringField
      FieldName = 'CONTA_DESPESA'
      ProviderFlags = []
      Size = 15
    end
    object cds_Mov_detCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = []
      Size = 15
    end
    object cds_Mov_detQTDE_PCT: TFloatField
      FieldName = 'QTDE_PCT'
      ProviderFlags = []
    end
    object cds_Mov_detLOTE: TStringField
      FieldName = 'LOTE'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
    object cds_Mov_detDTAFAB: TDateField
      FieldName = 'DTAFAB'
      ProviderFlags = [pfInUpdate]
      EditMask = '!99/99/0000;1;_'
    end
    object cds_Mov_detDTAVCTO: TDateField
      FieldName = 'DTAVCTO'
      ProviderFlags = [pfInUpdate]
      EditMask = '!99/99/0000;1;_'
    end
    object cds_Mov_detRATEIO: TStringField
      FieldName = 'RATEIO'
      FixedChar = True
      Size = 1
    end
    object cds_Mov_detPESO_QTDE: TFloatField
      FieldName = 'PESO_QTDE'
      ProviderFlags = []
    end
    object cds_Mov_detTotalPedido: TAggregateField
      Alignment = taRightJustify
      FieldName = 'TotalPedido'
      ProviderFlags = []
      Active = True
      currency = True
      DisplayFormat = ',#0.00'
      Expression = 'Sum(ValorTotal)'
    end
  end
  object dsp_Mov_det: TDataSetProvider
    DataSet = sds_Mov_Det
    UpdateMode = upWhereKeyOnly
    Left = 103
    Top = 287
  end
  object sds_Mov_Det: TSQLDataSet
    CommandText = 
      'select movd.CODDETALHE'#13#10', movd.CODMOVIMENTO'#13#10', movd.CODPRODUTO'#13#10 +
      ', movd.ICMS, movd.PRECO'#13#10', movd.QUANTIDADE'#13#10', movd.QTDE_ALT'#13#10', m' +
      'ovd.UN'#13#10', movd.BAIXA'#13#10', movd.CONTROLE'#13#10', movd.COD_COMISSAO'#13#10', mo' +
      'vd.LOTE'#13#10', movd.DTAFAB'#13#10', movd.DTAVCTO'#13#10', prod.CODPRO'#13#10',prod.PRO' +
      'DUTO'#13#10', prod.CODALMOXARIFADO'#13#10', prod.VALORUNITARIOATUAL'#13#10', prod.' +
      'QTDE_PCT'#13#10', ccus.ALMOXARIFADO'#13#10', prod.CONTA_DESPESA, prod.RATEIO' +
      '  '#13#10', prod.PESO_QTDE '#13#10'from MOVIMENTODETALHE movd '#13#10'inner join P' +
      'RODUTOS prod on prod.CODPRODUTO=movd.CODPRODUTO '#13#10'left outer joi' +
      'n ALMOXARIFADO ccus on ccus.CODALMOXARIFADO = prod.CODALMOXARIFA' +
      'DO '#13#10'where movd.CODDETALHE=:CODDETALHE or movd.CODMOVIMENTO=:pCO' +
      'DMOV '#13#10'order by movd.CODDETALHE'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'CODDETALHE'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pCODMOV'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 71
    Top = 287
    object sds_Mov_DetCODDETALHE: TIntegerField
      FieldName = 'CODDETALHE'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_Mov_DetCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_Mov_DetCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetICMS: TFloatField
      FieldName = 'ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetPRECO: TFloatField
      FieldName = 'PRECO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetQUANTIDADE: TFloatField
      FieldName = 'QUANTIDADE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetPRODUTO: TStringField
      DisplayWidth = 50
      FieldName = 'PRODUTO'
      ProviderFlags = []
      Required = True
      Size = 200
    end
    object sds_Mov_DetUN: TStringField
      FieldName = 'UN'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 2
    end
    object sds_Mov_DetQTDE_ALT: TFloatField
      FieldName = 'QTDE_ALT'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetBAIXA: TStringField
      FieldName = 'BAIXA'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sds_Mov_DetCONTROLE: TSmallintField
      FieldName = 'CONTROLE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = []
    end
    object sds_Mov_DetALMOXARIFADO: TStringField
      FieldName = 'ALMOXARIFADO'
      ProviderFlags = []
      Size = 30
    end
    object sds_Mov_DetVALORUNITARIOATUAL: TFloatField
      FieldName = 'VALORUNITARIOATUAL'
      ProviderFlags = []
    end
    object sds_Mov_DetCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetCONTA_DESPESA: TStringField
      FieldName = 'CONTA_DESPESA'
      ProviderFlags = []
      Size = 15
    end
    object sds_Mov_DetCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = []
      Size = 15
    end
    object sds_Mov_DetQTDE_PCT: TFloatField
      FieldName = 'QTDE_PCT'
      ProviderFlags = []
    end
    object sds_Mov_DetLOTE: TStringField
      FieldName = 'LOTE'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
    object sds_Mov_DetDTAFAB: TDateField
      FieldName = 'DTAFAB'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetDTAVCTO: TDateField
      FieldName = 'DTAVCTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_Mov_DetRATEIO: TStringField
      FieldName = 'RATEIO'
      ProviderFlags = []
      FixedChar = True
      Size = 1
    end
    object sds_Mov_DetPESO_QTDE: TFloatField
      FieldName = 'PESO_QTDE'
      ProviderFlags = []
    end
  end
  object s_8: TSQLDataSet
    CommandText = 
      'select CODDETALHE_SERV,CODMOVIMENTO, CODSERVICO, DESCRICAO, QUAN' +
      'TIDADE, PRECO from MOV_DETALHE_SERV where  CODMOVIMENTO = :PCODM' +
      'OV'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'PCODMOV'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 71
    Top = 318
    object s_8CODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object s_8CODSERVICO: TIntegerField
      FieldName = 'CODSERVICO'
      ProviderFlags = [pfInUpdate]
    end
    object s_8DESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
      Size = 400
    end
    object s_8QUANTIDADE: TFloatField
      FieldName = 'QUANTIDADE'
      ProviderFlags = [pfInUpdate]
    end
    object s_8PRECO: TFloatField
      FieldName = 'PRECO'
      ProviderFlags = [pfInUpdate]
    end
    object s_8CODDETALHE_SERV: TIntegerField
      AutoGenerateValue = arAutoInc
      FieldName = 'CODDETALHE_SERV'
      ProviderFlags = [pfInWhere, pfInKey]
    end
  end
  object d_8: TDataSetProvider
    DataSet = s_8
    Left = 104
    Top = 318
  end
  object c_8_serv: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'PCODMOV'
        ParamType = ptInput
      end>
    ProviderName = 'd_8'
    Left = 135
    Top = 318
    object c_8_servCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      Required = True
    end
    object c_8_servCODSERVICO: TIntegerField
      FieldName = 'CODSERVICO'
    end
    object c_8_servDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 400
    end
    object c_8_servQUANTIDADE: TFloatField
      FieldName = 'QUANTIDADE'
    end
    object c_8_servPRECO: TFloatField
      FieldName = 'PRECO'
    end
    object c_8_servCODDETALHE_SERV: TIntegerField
      AutoGenerateValue = arAutoInc
      FieldName = 'CODDETALHE_SERV'
    end
  end
  object ds_serv: TDataSource
    DataSet = c_8_serv
    Left = 168
    Top = 318
  end
  object dtProduto: TDataSource
    DataSet = cds_prod
    Left = 168
    Top = 350
  end
  object cds_prod: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsp_prod'
    Left = 135
    Top = 349
    object IntegerField2: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object StringField14: TStringField
      FieldName = 'FAMILIA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField15: TStringField
      FieldName = 'CATEGORIA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField16: TStringField
      FieldName = 'MARCA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField17: TStringField
      FieldName = 'UNIDADEMEDIDA'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 2
    end
    object DateField2: TDateField
      FieldName = 'DATAULTIMACOMPRA'
      ProviderFlags = [pfInUpdate]
      EditMask = '!99/99/00;1;_'
    end
    object StringField18: TStringField
      FieldName = 'LOCALIZACAO'
      ProviderFlags = [pfInUpdate]
      Size = 5
    end
    object FloatField7: TFloatField
      FieldName = 'ESTOQUEMAXIMO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField8: TFloatField
      FieldName = 'ESTOQUEATUAL'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField9: TFloatField
      FieldName = 'ESTOQUEREPOSICAO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField10: TFloatField
      FieldName = 'ESTOQUEMINIMO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField11: TFloatField
      FieldName = 'VALORUNITARIOATUAL'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField12: TFloatField
      FieldName = 'VALORUNITARIOANTERIOR'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodICMS: TFloatField
      FieldName = 'ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodIPI: TFloatField
      FieldName = 'IPI'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodCLASSIFIC_FISCAL: TStringField
      FieldName = 'CLASSIFIC_FISCAL'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_prodCST: TStringField
      FieldName = 'CST'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_prodBASE_ICMS: TFloatField
      FieldName = 'BASE_ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodPRODUTO: TStringField
      FieldName = 'PRODUTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      Size = 50
    end
    object cds_prodPRECOMEDIO: TBCDField
      FieldName = 'PRECOMEDIO'
      ProviderFlags = [pfInUpdate]
      Precision = 9
      Size = 2
    end
    object cds_prodCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodMARGEM_LUCRO: TFloatField
      FieldName = 'MARGEM_LUCRO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodCOD_BARRA: TStringField
      FieldName = 'COD_BARRA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodVALOR_PRAZO: TFloatField
      FieldName = 'VALOR_PRAZO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodTIPO: TStringField
      FieldName = 'TIPO'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object cds_prodCONTA_DESPESA: TStringField
      FieldName = 'CONTA_DESPESA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_prodCONTA_RECEITA: TStringField
      FieldName = 'CONTA_RECEITA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_prodCONTA_ESTOQUE: TStringField
      FieldName = 'CONTA_ESTOQUE'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_prodRATEIO: TStringField
      FieldName = 'RATEIO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cds_prodCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = [pfInUpdate]
      Size = 15
    end
    object cds_prodQTDE_PCT: TFloatField
      FieldName = 'QTDE_PCT'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodPESO_QTDE: TFloatField
      FieldName = 'PESO_QTDE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodDATACADASTRO: TSQLTimeStampField
      FieldName = 'DATACADASTRO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodMARGEM: TFloatField
      FieldName = 'MARGEM'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodPRO_COD: TStringField
      FieldName = 'PRO_COD'
      ProviderFlags = [pfInUpdate]
      Size = 15
    end
    object cds_prodDATAGRAV: TDateField
      FieldName = 'DATAGRAV'
      ProviderFlags = [pfInUpdate]
    end
    object cds_prodCODFORN: TStringField
      FieldName = 'CODFORN'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
  end
  object dsp_prod: TDataSetProvider
    DataSet = sds_prod
    UpdateMode = upWhereKeyOnly
    Left = 103
    Top = 349
  end
  object sds_prod: TSQLDataSet
    CommandText = 'select * from PRODUTOS order by PRODUTO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.sqlsisAdimin
    Left = 71
    Top = 349
    object IntegerField1: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object StringField8: TStringField
      FieldName = 'FAMILIA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField9: TStringField
      FieldName = 'CATEGORIA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField10: TStringField
      FieldName = 'MARCA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object StringField11: TStringField
      FieldName = 'UNIDADEMEDIDA'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 2
    end
    object DateField1: TDateField
      FieldName = 'DATAULTIMACOMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object StringField12: TStringField
      FieldName = 'LOCALIZACAO'
      ProviderFlags = [pfInUpdate]
      Size = 5
    end
    object FloatField1: TFloatField
      FieldName = 'ESTOQUEMAXIMO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField2: TFloatField
      FieldName = 'ESTOQUEATUAL'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField3: TFloatField
      FieldName = 'ESTOQUEREPOSICAO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField4: TFloatField
      FieldName = 'ESTOQUEMINIMO'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField5: TFloatField
      FieldName = 'VALORUNITARIOATUAL'
      ProviderFlags = [pfInUpdate]
    end
    object FloatField6: TFloatField
      FieldName = 'VALORUNITARIOANTERIOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodICMS: TFloatField
      FieldName = 'ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodCODALMOXARIFADO: TIntegerField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodIPI: TFloatField
      FieldName = 'IPI'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodCLASSIFIC_FISCAL: TStringField
      FieldName = 'CLASSIFIC_FISCAL'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_prodCST: TStringField
      FieldName = 'CST'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_prodBASE_ICMS: TFloatField
      FieldName = 'BASE_ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodPRODUTO: TStringField
      FieldName = 'PRODUTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      Size = 50
    end
    object sds_prodPRECOMEDIO: TBCDField
      FieldName = 'PRECOMEDIO'
      ProviderFlags = [pfInUpdate]
      Precision = 9
      Size = 2
    end
    object sds_prodCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodMARGEM_LUCRO: TFloatField
      FieldName = 'MARGEM_LUCRO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodCOD_BARRA: TStringField
      FieldName = 'COD_BARRA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodVALOR_PRAZO: TFloatField
      FieldName = 'VALOR_PRAZO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodTIPO: TStringField
      FieldName = 'TIPO'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_prodCONTA_DESPESA: TStringField
      FieldName = 'CONTA_DESPESA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_prodCONTA_RECEITA: TStringField
      FieldName = 'CONTA_RECEITA'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_prodCONTA_ESTOQUE: TStringField
      FieldName = 'CONTA_ESTOQUE'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_prodRATEIO: TStringField
      FieldName = 'RATEIO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sds_prodCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = [pfInUpdate]
      Size = 15
    end
    object sds_prodQTDE_PCT: TFloatField
      FieldName = 'QTDE_PCT'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodPESO_QTDE: TFloatField
      FieldName = 'PESO_QTDE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodDATACADASTRO: TSQLTimeStampField
      FieldName = 'DATACADASTRO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodMARGEM: TFloatField
      FieldName = 'MARGEM'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodPRO_COD: TStringField
      FieldName = 'PRO_COD'
      ProviderFlags = [pfInUpdate]
      Size = 15
    end
    object sds_prodDATAGRAV: TDateField
      FieldName = 'DATAGRAV'
      ProviderFlags = [pfInUpdate]
    end
    object sds_prodCODFORN: TStringField
      FieldName = 'CODFORN'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
  end
  object sds_cm: TSQLDataSet
    CommandText = 
      'select * from COMISSAO '#13#10'where ((COD_COMISSAO = :pcod) or (:pcod' +
      ' = 9999999)) '#13#10'or CODIGO = :CODIGO'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'CODIGO'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 71
    Top = 379
    object sds_cmCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_cmCODIGO: TStringField
      FieldName = 'CODIGO'
      ProviderFlags = [pfInUpdate]
      Size = 3
    end
    object sds_cmDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_cmINDICE: TStringField
      FieldName = 'INDICE'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_cmLB: TStringField
      FieldName = 'LB'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_cmCM: TStringField
      FieldName = 'CM'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
  end
  object dsp_cm: TDataSetProvider
    DataSet = sds_cm
    UpdateMode = upWhereKeyOnly
    Left = 103
    Top = 379
  end
  object cds_cm: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'CODIGO'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_cm'
    Left = 134
    Top = 380
    object cds_cmCOD_COMISSAO: TIntegerField
      FieldName = 'COD_COMISSAO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object cds_cmCODIGO: TStringField
      FieldName = 'CODIGO'
      ProviderFlags = [pfInUpdate]
      Size = 3
    end
    object cds_cmDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_cmINDICE: TStringField
      FieldName = 'INDICE'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object cds_cmLB: TStringField
      FieldName = 'LB'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object cds_cmCM: TStringField
      FieldName = 'CM'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
  end
  object DataSource1: TDataSource
    DataSet = cds_cm
    Left = 166
    Top = 380
  end
  object DataSource2: TDataSource
    Left = 166
    Top = 409
  end
  object ds_ccusto: TDataSource
    DataSet = DM.cds_ccusto
    Left = 166
    Top = 440
  end
  object sdslote: TSQLDataSet
    CommandText = 
      'SELECT lote.*, '#13#10'               prod.PRODUTO, '#13#10'               p' +
      'rod.CODPRO '#13#10'FROM LOTES lote, PRODUTOS prod '#13#10'WHERE prod.CODPROD' +
      'UTO = lote.CODPRODUTO '#13#10'AND lote.LOTE = :PLOTE '
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'PLOTE'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 256
    Top = 280
    object sdsloteCODLOTE: TIntegerField
      FieldName = 'CODLOTE'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sdsloteLOTE: TStringField
      FieldName = 'LOTE'
      ProviderFlags = [pfInUpdate]
      Required = True
      Size = 200
    end
    object sdsloteCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sdsloteDATAFABRICACAO: TDateField
      FieldName = 'DATAFABRICACAO'
      ProviderFlags = [pfInUpdate]
    end
    object sdsloteDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object sdsloteESTOQUE: TFloatField
      FieldName = 'ESTOQUE'
      ProviderFlags = [pfInUpdate]
    end
    object sdslotePRODUTO: TStringField
      FieldName = 'PRODUTO'
      ProviderFlags = []
      Required = True
      Size = 300
    end
    object sdsloteCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = []
      Size = 15
    end
  end
  object dsplotes: TDataSetProvider
    DataSet = sdslote
    Options = [poAllowCommandText]
    UpdateMode = upWhereKeyOnly
    Left = 288
    Top = 280
  end
  object cdslotes: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftString
        Name = 'PLOTE'
        ParamType = ptInput
      end>
    ProviderName = 'dsplotes'
    Left = 320
    Top = 280
    object cdslotesCODLOTE: TIntegerField
      FieldName = 'CODLOTE'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cdslotesLOTE: TStringField
      FieldName = 'LOTE'
      ProviderFlags = [pfInUpdate]
      Required = True
      Size = 200
    end
    object cdslotesCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cdslotesDATAFABRICACAO: TDateField
      FieldName = 'DATAFABRICACAO'
      ProviderFlags = [pfInUpdate]
      EditMask = '!99/99/00;1;_'
    end
    object cdslotesDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
      EditMask = '!99/99/00;1;_'
    end
    object cdslotesESTOQUE: TFloatField
      FieldName = 'ESTOQUE'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.0'
      EditFormat = ',##0.0'
    end
    object cdslotesPRODUTO: TStringField
      FieldName = 'PRODUTO'
      ProviderFlags = []
      Required = True
      Size = 300
    end
    object cdslotesCODPRO: TStringField
      FieldName = 'CODPRO'
      ProviderFlags = []
      Size = 15
    end
  end
  object s_2: TSQLDataSet
    CommandText = 
      'select CODIGO, CONTA, NOME from PLANO where plnCtaRoot(CONTA) = ' +
      ':PCONTADESPESA AND CONSOLIDA = '#39'S'#39
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'PCONTADESPESA'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 77
    Top = 218
    object s_2CODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object s_2CONTA: TStringField
      FieldName = 'CONTA'
      Required = True
      Size = 15
    end
    object s_2NOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 40
    end
  end
  object d_2: TDataSetProvider
    DataSet = s_2
    Left = 110
    Top = 218
  end
  object cds_ccusto: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftString
        Name = 'PCONTADESPESA'
        ParamType = ptInput
      end>
    ProviderName = 'd_2'
    Left = 152
    Top = 219
    object cds_ccustoCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object cds_ccustoCONTA: TStringField
      FieldName = 'CONTA'
      Required = True
      Size = 15
    end
    object cds_ccustoNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 40
    end
  end
  object VCLReport1: TVCLReport
    AsyncExecution = False
    Title = 'Untitled'
    Left = 664
    Top = 392
  end
  object sdslista: TSQLDataSet
    CommandText = 
      'select lista.UNIDADE, lista.PRECOLISTA, lista.CODIGO, lista.CODP' +
      'RODUTO, lista.CODFORNECEDOR, prod.PRODUTO from LISTAPRECO lista,' +
      ' produtos prod'#13#10'where lista.codProduto = prod.codProduto and  CO' +
      'DFORNECEDOR = :forn '#13#10'and CODIGO = :cd'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'forn'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'cd'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 304
    Top = 372
    object sdslistaUNIDADE: TStringField
      FieldName = 'UNIDADE'
      Size = 2
    end
    object sdslistaPRECOLISTA: TFloatField
      FieldName = 'PRECOLISTA'
    end
    object sdslistaCODIGO: TStringField
      FieldName = 'CODIGO'
      Size = 15
    end
    object sdslistaCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
    end
    object sdslistaCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
    end
    object sdslistaPRODUTO: TStringField
      FieldName = 'PRODUTO'
      Required = True
      Size = 300
    end
  end
  object dsplista: TDataSetProvider
    DataSet = sdslista
    UpdateMode = upWhereKeyOnly
    Left = 336
    Top = 372
  end
  object cdslista: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'forn'
        ParamType = ptInput
      end
      item
        DataType = ftString
        Name = 'cd'
        ParamType = ptInput
      end>
    ProviderName = 'dsplista'
    Left = 368
    Top = 372
    object cdslistaUNIDADE: TStringField
      FieldName = 'UNIDADE'
      Size = 2
    end
    object cdslistaPRECOLISTA: TFloatField
      FieldName = 'PRECOLISTA'
    end
    object cdslistaCODIGO: TStringField
      FieldName = 'CODIGO'
      Size = 15
    end
    object cdslistaCODPRODUTO: TIntegerField
      FieldName = 'CODPRODUTO'
    end
    object cdslistaCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
    end
    object cdslistaPRODUTO: TStringField
      FieldName = 'PRODUTO'
      Required = True
      Size = 300
    end
  end
  object UCHist_DataSetMovimento: TUCHist_DataSet
    DataSet = cds_Movimento
    ControlHistorico = UCControlHistoricoCompra
    Left = 504
    Top = 288
  end
  object UCControlHistoricoCompra: TUCControlHistorico
    Options.SaveNewRecord = False
    Options.SaveDelete = True
    Options.SavePostInsert = True
    Options.SavePostEdit = True
    Options.TypeSavePostEdit = tpSaveAllFields
    TableHistory.TableName = 'UCTABHistory'
    TableHistory.FieldApplicationID = 'ApplicationID'
    TableHistory.FieldUserID = 'UserID'
    TableHistory.FieldEventDate = 'EventDate'
    TableHistory.FieldEventTime = 'EventTime'
    TableHistory.FieldForm = 'Form'
    TableHistory.FieldCaptionForm = 'FormCaption'
    TableHistory.FieldEvent = 'Event'
    TableHistory.FieldObs = 'Obs'
    TableHistory.FieldTableName = 'tName'
    HistoryMsg.Evento_Insert = 'Inserido'
    HistoryMsg.Evento_Delete = 'Apagado'
    HistoryMsg.Evento_Edit = 'Editado'
    HistoryMsg.Evento_NewRecord = 'Novo registro'
    HistoryMsg.Hist_All = 'Todos'
    HistoryMsg.Msg_LimpHistorico = 'Excluir todo o conte'#250'do do hist'#243'rico ?'
    HistoryMsg.Msg_MensConfirma = 'Confirma'#231#227'o'
    HistoryMsg.Msg_LogEmptyHistory = 'Usu'#225'rio %s apagou todo o hist'#243'rico as %s'
    HistoryMsg.LabelDescricao = 'Hist'#243'rico de tabelas'
    HistoryMsg.LabelUser = 'Usu'#225'rio'
    HistoryMsg.LabelForm = 'Formul'#225'rio'
    HistoryMsg.LabelEvento = 'Evento'
    HistoryMsg.LabelTabela = 'Tabela'
    HistoryMsg.LabelDataEvento = 'Data'
    HistoryMsg.LabelHoraEvento = 'Hora'
    HistoryMsg.Msg_NewRecord = '%s inseriu um novo registro'
    HistoryMsg.Hist_MsgExceptPropr = 'Favor informar a propriedade %s'
    HistoryMsg.Hist_BtnFiltro = '&Aplicar Filtro'
    HistoryMsg.Hist_BtnExcluir = '&Excluir Hist'#243'rico'
    HistoryMsg.Hist_BtnFechar = '&Fechar'
    Left = 528
    Top = 248
  end
  object UCHist_DataSetMov_det: TUCHist_DataSet
    DataSet = cds_Mov_det
    ControlHistorico = UCControlHistoricoCompra
    Left = 544
    Top = 288
  end
  object DataSource3: TDataSource
    DataSet = cds_Veiculocli
    Left = 166
    Top = 409
  end
  object sds_Veiculocli: TSQLDataSet
    CommandText = 
      'select * from VEICULO '#13#10'where PLACA = :pplaca or COD_VEICULO =  ' +
      ':PVEIC'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'pplaca'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'PVEIC'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 71
    Top = 409
    object sds_VeiculocliCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_VeiculocliCOD_CLIENTE: TIntegerField
      FieldName = 'COD_CLIENTE'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_VeiculocliPLACA: TStringField
      FieldName = 'PLACA'
      ProviderFlags = [pfInUpdate]
      Size = 10
    end
    object sds_VeiculocliMARCA_MODELO: TStringField
      FieldName = 'MARCA_MODELO'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
    object sds_VeiculocliTIPO: TStringField
      FieldName = 'TIPO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_VeiculocliCOMBUSTIVEL: TStringField
      FieldName = 'COMBUSTIVEL'
      ProviderFlags = [pfInUpdate]
    end
    object sds_VeiculocliANO_FAB: TStringField
      FieldName = 'ANO_FAB'
      ProviderFlags = [pfInUpdate]
      Size = 4
    end
    object sds_VeiculocliANO_MOD: TStringField
      FieldName = 'ANO_MOD'
      ProviderFlags = [pfInUpdate]
      Size = 4
    end
    object sds_VeiculocliCOR: TStringField
      FieldName = 'COR'
      ProviderFlags = [pfInUpdate]
    end
  end
  object dsp_Veiculocli: TDataSetProvider
    DataSet = sds_Veiculocli
    UpdateMode = upWhereKeyOnly
    Left = 103
    Top = 409
  end
  object cds_Veiculocli: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftString
        Name = 'pplaca'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'PVEIC'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_Veiculocli'
    Left = 135
    Top = 409
    object cds_VeiculocliCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object cds_VeiculocliCOD_CLIENTE: TIntegerField
      FieldName = 'COD_CLIENTE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_VeiculocliPLACA: TStringField
      FieldName = 'PLACA'
      ProviderFlags = [pfInUpdate]
      EditMask = 'LLL\-0000;1;_'
      Size = 10
    end
    object cds_VeiculocliMARCA_MODELO: TStringField
      FieldName = 'MARCA_MODELO'
      ProviderFlags = [pfInUpdate]
      Size = 60
    end
    object cds_VeiculocliTIPO: TStringField
      FieldName = 'TIPO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_VeiculocliCOMBUSTIVEL: TStringField
      FieldName = 'COMBUSTIVEL'
      ProviderFlags = [pfInUpdate]
    end
    object cds_VeiculocliANO_FAB: TStringField
      FieldName = 'ANO_FAB'
      ProviderFlags = [pfInUpdate]
      Size = 4
    end
    object cds_VeiculocliANO_MOD: TStringField
      FieldName = 'ANO_MOD'
      ProviderFlags = [pfInUpdate]
      Size = 4
    end
    object cds_VeiculocliCOR: TStringField
      FieldName = 'COR'
      ProviderFlags = [pfInUpdate]
    end
  end
end
